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module register (clock, reset, d, q) ; 
input clock, d, reset; 
output q; 
reg q; 

alwaysQ (posedge clock or negedge reset) 
if (-reset) 

q = 0; 
else 

q = d; 
endmodule 

module example; 
wire dl, d2, d3; 
wire ql, q2, q3; 
reg sigin; 
wire sigout; 
reg elk, reset; 

register regl (elk, reset, dl, ql) ; 
register reg2 (elk, reset, d2, q2) ; 
register reg3 (elk, reset, d3, q3) ; 

assign dl = sigin ^ q3; 
assign d2 = ql ^ q3; 
assign d3 = q2 q3; 
assign sigout = q3; 

//a clock generator 

always 

begin 

elk = 0; 

#5; 

elk = 1; 
#5; 
end 

// a signal generator 
always 
begin 
#10; 

sigin = $ random; 
end 

// initialization 

initial 

begin 



reset =1; 
#5; 

$monitor ($time, " %b, %b", sigin, sigout); 
#1000 $finish; 
end 

end module 



reset = 0; 
sigin = 0; 
#1; 
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module register (clock, reset, d, q) ; 
input clock, d, reset; 
output q; 
reg q; 

always@ (post edge clock or negedge reset k 
if (-reset) 

q = 0 
else 

q = d; 
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module example; 

wire dl, d2, d3 
ware ql, q2, q3 

reg si gin; 
wire sigout; ^ 
reg elk, reset; 
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Test -bench input — 908 
Test -bench output — 909 



51 register reg 1 (elk, reset 

52 register reg 2 (elk, reset 

53 register reg 3 (elk, reset 

54 assign dl = sigin ^ q3, 

55 assign d2 = ql ^ 3; 
36 assign dS = q2 ^ q3; 
S7 assign signout = q3; 

// a clock generator"^ 
always 
begin 



, dl, ql);7 
, d2, q2) ; 
, d3, q3) ; J 
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elk = 0; 
#5; 

elk = 1; 



- Clock component 
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//a signal generator] 
always / 
begin ( 
#10; r 
sigin = $random; \ 
end ) 



// initialization"^ 
initial 
begin 

reset - 0; 

sigin = 0; 

#1; 

reset = 1; 
#5; 

$monitor ($tirr 
#1000 $finish; 
end 

end module 
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